
;--- OPATTR with -Zg set.
;--- since v2.16, this should make opattr to return exactly Masm's values,
;--- that is, language bits are set for procs/protos only.

	.286
	.MODEL small, c
	option casemap:none

	public c clbl2	; explicitely set a language
	public c dlbl2

	.data

dlbl1 db 0
dlbl2 db 0

	.CODE

clbl1:
clbl2:

proc1 proc
proc1 endp
proto1 proto :dword

teq textequ %(opattr clbl1)
	dw teq

teq textequ %(opattr clbl2)
	dw teq

teq textequ %(opattr proc1)
	dw teq

teq textequ %(opattr proto1)
	dw teq

teq textequ %(opattr dlbl1)
	dw teq

teq textequ %(opattr dlbl2)
	dw teq

teq textequ %(opattr clbl3)
	dw teq

clbl3:


	END
